PROGRAM NAME: Portswap.ASM

DESCRIPTION:  Swapping printer ports on the IBM PC.

ISSUE: August, 1985
PAGE:  13

SOFTWARE VERSIONS:  dBASE II, IBM PC format

FUNCTION: This routine allows you to toggle output between LPT1
and LPT2 allowing access to two printers through dBASE II.
 
FILES NEEDED: Portswap.ASM

SETUP INSTRUCTIONS: To run this program, POKE or LOAD it into
memory, and then CALL it.  The default printer port is LPT1.
When redirecting to LPT2, be sure to restore LPT1 after the print
run is finished.
For example:
	
	* ---LOAD or POKE into memory.
	LOAD Portswap
	SET CALL TO 64000

	* ---Print a statement through to the default port, LPT1.
	DO Statement	

	* ---Print a private insurance superbill through LPT2.
	CALL <---------------------------- Redirect to LPT2.
	DO PrivIns
	CALL <---------------------------- Restore LPT1.



POKE Sequence:

POKE 64000,  6, 80, 83, 87,184, 64,  0, 80,  7, 191,;
             8,  0, 38,139,  5, 71, 71, 38,139,  29,;
            38,137, 5, 79,  79, 38,137, 29,95,91,88,;
             7,195